home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / winterp-1.13 / src-server / winterp.h < prev   
Encoding:
C/C++ Source or Header  |  1991-10-04  |  4.2 KB  |  106 lines
  1. /* -*-C-*-
  2. ********************************************************************************
  3. *
  4. * File:         winterp.h
  5. * RCS:          $Header: winterp.h,v 1.9 91/04/22 00:25:33 mayer Exp $
  6. * Description:  Miscellaneous macros, #defines, etc
  7. * Author:       Niels Mayer, HPLabs
  8. * Created:      Wed Aug 31 14:09:08 1988
  9. * Modified:     Fri Oct  4 03:22:45 1991 (Niels Mayer) mayer@hplnpm
  10. * Language:     C
  11. * Package:      N/A
  12. * Status:       X11r5 contrib tape release
  13. *
  14. * WINTERP Copyright 1989, 1990, 1991 Hewlett-Packard Company (by Niels Mayer).
  15. * XLISP version 2.1, Copyright (c) 1989, by David Betz.
  16. *
  17. * Permission to use, copy, modify, distribute, and sell this software and its
  18. * documentation for any purpose is hereby granted without fee, provided that
  19. * the above copyright notice appear in all copies and that both that
  20. * copyright notice and this permission notice appear in supporting
  21. * documentation, and that the name of Hewlett-Packard and David Betz not be
  22. * used in advertising or publicity pertaining to distribution of the software
  23. * without specific, written prior permission.  Hewlett-Packard and David Betz
  24. * make no representations about the suitability of this software for any
  25. * purpose. It is provided "as is" without express or implied warranty.
  26. *
  27. * HEWLETT-PACKARD AND DAVID BETZ DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  28. * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS,
  29. * IN NO EVENT SHALL HEWLETT-PACKARD NOR DAVID BETZ BE LIABLE FOR ANY SPECIAL,
  30. * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
  31. * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
  32. * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  33. * PERFORMANCE OF THIS SOFTWARE.
  34. *
  35. * See ./winterp/COPYRIGHT for information on contacting the authors.
  36. * 
  37. * Please send modifications, improvements and bugfixes to mayer@hplabs.hp.com
  38. * Post XLISP-specific questions/information to the newsgroup comp.lang.lisp.x
  39. *
  40. ********************************************************************************
  41. */
  42.  
  43. #define WINTERP_VERSION_INT 1
  44. #define WINTERP_REVISION_INT 13
  45.  
  46. /*----------------------------------------------------------------------------
  47.  * Kludges to sweeten Xt's ugly argument processing for widget creation.
  48.  *---------------------------------------------------------------------------*/
  49. extern Arg _args[];        /* global in winterp.c */
  50. extern int _num_args;        /* global in winterp.c */
  51.  
  52. #define ARGLIST_RESET() \
  53.   _num_args = 0
  54.  
  55. #define ARGLIST_ADD(name, value) \
  56.   XtSetArg(_args[_num_args], (name), (value)); _num_args++
  57.  
  58. #define ARGLIST_SET_LAST_ELT(name, value) \
  59.   XtSetArg(_args[(_num_args - 1)], (name), (value))
  60.  
  61. #define ARGLIST() \
  62.   _args, _num_args
  63.  
  64.  
  65. /* Setup cpp symbols for conditional compilation of Motif 1.0 vs Motif 1.1 */
  66.  
  67. #if (XmVersion >= 1001)        /* XmVersion from <Xm/Xm.h> */
  68. #define WINTERP_MOTIF_11
  69. #endif
  70.  
  71. #ifndef WINTERP_MOTIF_11    /* Motif 1.0 backwards compatibility */
  72. typedef unsigned char XtEnum;
  73. #endif
  74.  
  75. #ifndef WINTERP_MOTIF_11    /* Motif 1.0 backwards compatibility */
  76. typedef char* XtPointer;
  77. #endif
  78.  
  79. /*
  80.  * Motif 1.1.1 has some changes over version 1.1 that are important enough to
  81.  * require #ifdefs in the code. Gratuitous, consistency-violating alterations
  82.  * to the API were made in fixing the 1.1 bugs. Because Motif 1.1 and Motif 1.1.1
  83.  * cannot be identified through any sort of documented means, I had to resort
  84.  * to a hack, in the truest sense of the word, in order to work around this
  85.  * charming detail. The hack to determine which version of Motif 1.1 you're
  86.  * running: 1.1.1 defines the new symbol XmDYNAMIC_DEFAULT_TAB_GROUP, and
  87.  * 1.1 doesn't... The presence of that symbol tells WINTERP that we're using
  88.  * 1.1.1 and defines WINTERP_MOTIF_111. This is used in a few places in
  89.  * w_resources.c, for example.
  90.  */
  91. #ifdef WINTERP_MOTIF_11
  92. #ifdef XmDYNAMIC_DEFAULT_TAB_GROUP
  93. #define WINTERP_MOTIF_111
  94. #endif                /* XmDYNAMIC_DEFAULT_TAB_GROUP */
  95. #endif                /* WINTERP_MOTIF_11 */
  96.  
  97. /*
  98.  * Motif 1.1.3 defines two new symbols, XmCR_CREATE and XmCR_PROTOCOLS, use
  99.  * these to tell us we're running 1.1.3...
  100.  */
  101. #ifdef WINTERP_MOTIF_11
  102. #ifdef XmCR_CREATE
  103. #define WINTERP_MOTIF_113
  104. #endif /* XmCR_CREATE */
  105. #endif /* WINTERP_MOTIF_11 */
  106.